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PREFACE 


One of the programing languages utilized by the Burroughs B 5000 Information 
Processing System is ALGOL 60. This algorithmic language was designed to describe 
computational processes, and is excellent for this purpose. The formulation of 
this language was restricted to areas which are machine independent. Implemen- 
tation of machine-dependent elements was recognized to be the responsibility of 
the individual computer manufacturer. For example, ALGOL 60 alone is incomplete 
when a computer is to be used for the execution of computational processes, since 


the means of communicating data to and from a particular computer are not provided. 


ALGOL 60, together with these Burroughs extensions, henceforth will be referred 
to in Burroughs literature as Extended ALGOL. Extended ALGOL provides the B 5000 
programer with complete input-output facilities; STREAM PROCEDURE declarations 
which allow use of the B 5000 character mode functions; the ability to perform 
symbolic debugging; plus’ other useful miscellaneous facilities, including the 
ability to perform partial-word arithmetic and double-precision arithmetic. 


This advance release completely describes the input-output portion of Extended 
AIGOL. The material presented herein will be included in forthcoming documents 
covering Extended ALGOL in its entirety. 


This language has been patterned after familiar programing concepts and fitted 

into the structure of ALGOL 60. It is assumed that the reader is familiar with 
ALGOL 60 and the B 5000 Information Processing System. Background reading should 
include the following Burroughs material: An Introduction to ALGOL 60 (Bulletin 
5000-21001-P); Master Control Program Characteristics for the Burroughs B 5000 
Information Processing System (Bulletin 5000-21003 -P); The Descriptor, a Definition 


of the B 5000 Information Processing System (Bulletin 5000-20002-P); and File 
Control on the Burroughs B 5000. In addition, the reader should be familiar with 


"Report on the Algorithmic Language ALGOL 60," Communications of the Association 
for Computing Machinery, Vol. 3, No. 5, May 1960. 


SECTION ONE 


INPUT 


Input to a program is the means by which variables of a program are given 
initial values. This method is used for initializing variables, the beginning 
values of which vary from run to run. For variables with fixed initial values, 


the (assignment statement )* may be used. 


Input may be visualized as a communication from an external source to the 
program. The B 5000 provides two types of equipment through which this com- 
munication can be effected: card readers and magnetic tape units. Information 
may be recorded on punched cards and magnetic tape in either of two codes: 


alphanumeric or binary. 


The contents of the communication (data) may be expressed in a variety of 
forms which are made available to accommodate the various kinds of data in- 
troduced to programs: alphabetic characters, integer numbers, decimal fractions, 


logical values, and numbers with exponents. 


Any number of variables may be initialized with a single input of data. In 
addition, the programer has complete freedom to designate the location of each 


value on the input document. 


The purpose of the input language portion of Extended ALGOL is to specify a 


fixed set of the above alternatives for every communication. 


PUNCHED CARD PRT ARRAY 


INPUT BUFFER 
LOCATION OF VARIABLES 


MAGNETIC 
TAPE 
RECORD 


STACK nae 


1 
The use of broken brackets { ) is intended to direct the reader to the 
syntax of ALGOL 60 and of these extensions, for a statement of the specific 
form of the enclosed entity. 


The need for program input is communicated to the B 5000 by means of a 

(file declaration). At such a point ina program, input buffer areas are 
established in memory and filled with data. Each buffer accommodates the 
unedited contents of one unit of input, that is, a punched card or a magnetic 


tape record. 


When input is actually calied for by means of a read statement, data is edited 
and selectively stored in memory in the locations previously reserved for 

those variables being initialized. As soon as the reading process is completed, 
two things occur: the buffer is refilled, and at the same time the program 
starts using the data which has just been provided it. More than one buffer 


may be used by indicating this need in the (file declaration). 


Designation of Input Equipment Type 


Whether data is to be read from punched cards or magnetic tape, and in which 
mode, is designated in the program parameter card. This card informs the 
Master Control Program (MCP) that a program is ready for processing and gives 


AAT 


enough information about the program to enabie tne MCP to schedule it. 


The contents of the program parameter card are not part of a program; there- 
fore, they are not expressed in Extended AIGOL. This information is rather 

a message from tne human operator of the system to the MCP. This card contains 
a complete’ list of (file identifier)s which appear in the program and the type 


of component to be used by each. 


As a consequence, the (file identifier)s remain constant in the program. The 
associated components, on the other hand, may change from run to run, since 

their designation is from outside the program. Therefore, initial values may 
be obtained from punched cards for one run and from magnetic tape in the next 


run, without any change to the program. 


The Programing Language 


INPUT FILE DECLARATION 


Syntax: 

(file declaration) ::= FILE (input or output) (file part ) 

(input or output) ::= IN | ouT 

(file part) ::= (file identifier) ( (buffer part) ) | (file part) , 
(file identifier) ( (buffer part) ) 

(buffer part) ::= (number of buffers) , (buffer size) 

(number of buffers) ::= (unsigned integer) 

(buffer size) ::= (unsigned integer) 

(file identifier) ::= (identifier) 

Examples: 


FILE IN DATA] (2,10), DATA2 (3,20) 
FILE IN IN1 (1, 1023) 


Semantics: 


The purpose of the input (file declaration) is to describe the buffers needed 
for handling the input of the file. The number of buffers desired and the size 
of each are called for in the file declaration. It, like all other {(declaration)s, 


must appear in some (block head) in the program. 


An input (file declaration) results in the establishment of the designated number 
of buffer areas, each with the number of words indicated by (puffer size). If 
sufficient memory is not available to assign that (number of buffers), a lesser 


number is allocated by the MCP at run time. 


In addition, the buffers are filled with data: the contents of one punched card 
or magnetic tape record per buffer. The size of the buffer area must be large 


enough to accommodate the entire contents of the particular unit of input being 


used. For instance, an 80-colum card read in alpha mode requires a (puffer size) 


of 10. The same size card, read in binary mode, requires 20 words. A magnetic 


tape record may vary in size from one to 1023 words. 


in which the (file declaration) appeared. 


INPUT FORMAT DECLARATION 


Syntax: 

(format declaration) ::= FORMAT (input or output) (format part) 

(input or output) ::= IN | OUT 

(format part) ::= (format identifier) ( (editing specifications) ) | (format part) , 

(format identifier) ( (editing specifications) ) 

(format identifier) ::= (identifier) 

(editing specifications) ::= (editing segment) | (editing specifications ) / | 
| / (editing specifications) | (editing specifications) 

/ (editing segment) 

(editing segment) ::= (editing phrase ) | (repeat part) [ (editing specifications) ] 
(editing segment) , (editing phrase) | (editing segment) , 
(repeat part) [ (editing specifications) ] 

(editing phrase) ::= (repeat part) (editing phrase type) (field part) | (string) 

(repeat part) ::= (empty) | (unsigned integer) 

(editing phrase type) ::=A|[D|E|Fr{]zm]uLuj[o|rpl{x 

(field part) ::= (empty) | (field width) | (field width) . (decimal places) 

(field width) ::= (unsigned integer) 

(decimal places) ::= (unsigned integer) 

Examples: 


FORMAT IN F1 (X4,2I6,E9.2,3F5.1) 

FORMAT IN F21 (2L6,18),Fr22 (18 0) 

FORMAT IN F31 (A5,3A6,X5,A4),F32 (13A6, A2) 
FORMAT IN F4 (A6,5[X3, 2E9.2,2F6.1],317) 
FORMAT IN F5 (810.3 / 16L5) 


Semantics: 


The input (format declaration) defines the editing necessary to be performed 

on the data to make it acceptable to the program. The input buffer contents 
may be a string of 6-bit characters (alpha mode) or a string of 48-bit binary 
words (binary mode). It is the responsibility of the input (format declaration) 
to indicate where, and in what form, the initial values of variables are to be 


found in this string. The (editing phrase) accomplishes this task. 


The syntax above shows that the (editing phrase) may be in either of two forms. 
In the first form, the (repeat part) of the (editing phrase) is an integer which 
indicates the number of times an (editing phrase ) is to be used. If the (repeat 
part ) is (empty), it is taken to be equal to one. Its purpose is to eliminate 
the need for consecutively duplicating the same phrase. A series of (editing 
phrase)s may also be designated for repetitive use by enclosing the set in square 
brackets. The number of uses is denoted by an integer immediately preceding the 
left bracket. Each use of an (editing phrase) of this form, except those which 


delete, accomplishes the initializing of one computer word. 


The heart of the (editing phrase) is the (editing phrase type). There are eight 
different input types, which are grouped into two categories corresponding to 
the two basic representations of data, alphanumeric and binary. It is important 
to recognize the difference between the form of the input data upon entry into 
the buffer ‘area and the essential nature of the data; that is, the form in which 
it is used by the program, since they do not necessarily correspond. A numeric 
value may be in decimal form upon read in and be converted to binary form for use 


by the program. 


The (field part ) of the (editing phrase ) indicates the number of characters to 
be effected by that phrase. It may, also, in the case of numbers, indicate the 
presence of a decimal point and the number of digits after that decimal point. 
It serves no function in binary-type (editing phrase)s, since each such phrase 


always refers to one word. 


The second form, (string), is used for output only. It is not allowed in an 


input (format declaration). 


ALPHANUMERIC (EDITING PHRASE TYPE)S 


The (editing phrase type)s A,E,F,I,L and X are alphanumeric types. They are 
used for editing data which is in the alphanumeric form upon entry. Such data 
will be interpreted as being composed of 6-bit characters. Several ways are 
provided for expressing data in this form, which are syntactically defined as 
follows. 


Syntax : 

(character input data) ::= (string input) | (logical input) | (numeric input) | 
(character input data) (string input ) | (character 
input data) (logical input) | (character input data) 
(numeric input) 

(string input) ::= (any sequence of characters) 

(logical input) ::= TRUE | FALSE | (space) (logical input) 

(space) ::= (single space) | (space) (single space) 

(numeric input) ::= (sign) (unsigned numeric input) | (space) (numeric input) 

(sign) ::=+ | - | (single space) 

(unsigned numeric input) ::= (decimal number) | © (decimal fraction) (power of ten) 

(exponent) ::= (digit) (digit) 

(decimal number) ::= (unsigned integer) | (unsigned integer) (decimal fraction) | 

(decimal fraction) 

(power of ten) ::=, (sign) (exponent) 

(decimal fraction) ::= . (unsigned integer) 

(unsigned integer) ::= (digit) | (umsigned integer) (digit) 


The above syntax is not a part of Extended AIGOL, but is only a description of all 
forms of input acceptable to a program written in Extended ALGOL using the 


(format declaration). 


Examples of Character Input Data 


(string input) (logical input) 
ALGOL60 pTRUE 
=>+A3" FALSE 


(numeric input) 
+5000 b4.625 v0.74, -01> 
b961 +.125 b+0.18,b03 
—237 —167.7 -0.1,+08 


Note that in the above examples the numbers are separated into three groups: 
integers, numbers with decimal points, and numbers with exponents. The (editing 
phrase type)s used with these numbers are I, F, and E, respectively. Type A 

is used for (string input) and type L for (logical input). Type X is used to 
delete characters from the input data. The (field part) indicates the number 

of characters to be deleted. The effect of each type is shown in the following 


illustration. 


Assume that the input data, shown in the above examples, is read in from a card. 


The contents of this card are as follows: 


Col: 
i. 9 1 8b 20) oo) D 3D 9) mB DD co 6 0 fe 80 


ALGOL60=>+A3 "bTRUEFALSE+5 000b961-23 7b .6254+.125-167.7bO. 74, -O1b+0.18, bO3-0.1, +08 


The input buffer would appear as follows: 


Ale [e]o]=] 6] of =] 


To illustrate how the (editing phrase type)s function, the following (format 
declaration) will be applied to the above input data. 


FORMAT IN F1 (A5,X2,A6,2L5,15,27T4,F6.3,F5.3,F6.1,X9,E10.2, E8.1) 


“The sign of an exponent must be indicated by either a minus (-) or a plus (+) 
sign, or a blank. A blank is taken to be a plus (+). 
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FORM IN WHICH INITIAL 


CHARACTERS TO WHICH VALUE IS SUPPLIED TO 
EDITING PHRASE REFERS EDITING PHRASE THE PROGRAM 

ALGOL —————$————————A5- Or O1O! ALLIGtOLL 
60—_— rio ———_No Characters Supplied 
=2rA3" AG OO EL ae) a3] 


i i eS 2475463 1463 14 


bO. 74, -01——_________—_ x9 lo Characters Supplied 
bt+0. 18, bO3 —______________E 10.2. 2640000000000 
-0.1, +08 -——_____________- E8 . 1 4611320000000 


editing phrase 


ct 


The binary ype)s are D and O. They are used for editing data 
which is in binary form upon entry, that is, in the form to be used by the pro- 
gram; therefore, no conversion is necessary. Such input generally would be on 
cards punched with straight binary code or on magnetic tape recorded in the 
binary mode. The (field part ) in these cases is irrelevant and should be 


(empty). 
The (editing specifications) of an input (format declaration) must not contain 


a mixture of (editing phrase type)s; that is, they must be either all alphanumeric 


or all binary. 


3 See Appendix A for explanation of constructs of B 5000 computer words. 


The table below summarizes the actions of the (editing phrase type)s. EDITED FORM FOR 
TYPE WHEN USED FORM OF INPUT STRING PROGRAM USE 


ALPHANUMERIC 


when data is to remain in alpha form one field of characters one alpha yeas 


when data is numeric in nature but one field of characters one binary word 
externally represented in alpha as 
a decimal fraction with an exponent 


D 


when data is numeric in nature but one field of characters one binary word: 


externally represented in alpha as 
a decimal number without an exponent 


D 


when data is numeric in nature but one field of characters one binary word 
externally represented in alpha as an 
integer 


when data is logical in nature and one field of characters one binary word 
externally represented in alpha as 
a (logical value) 


when data is externally represented 
in binary 


These alpha words contain not more than six characters. 


Teele integers and decimal mantissas have a maximum value of 549755813887. 


INPUT LIST DECLARATION 


syntax: 
(list declaration) ::= LIST (list part) 
(list part) ::= (list identifier) ( (list) ) | (list part) , (list identifier) 
( (list) ) 
(list identifier) ::= (identifier) 
(list) ::= (list segment) | (list) , (list segment) 
(list segment) ::= (expression part) | (for clause) (list segment) | (for clause) 
[ (expression list) ] 
(expression part) ::= (list identifier) | (arithmetic expression) | (Boolean expression) 
(expression list) ::= (expression list) , (expression part ) | (expression part) 
Examples: 
LIST L1 (X,Y, 2Z, PQ2) 


( 
List 2e (ltl. ¥. Ria Kl, 2). 12) CAs Bscl i) 
LIST L3 (FOR IeX STEP 1 UNTIL 5 DO B[T],T,U) 
LIST L4 (FOR I+] STEP 1 UNTIL 10 DO FOR J<+1 STEP 1 UNTIL 15 Do A[I,J]) 


Semantics: 


A (list declaration) can be used for both input and output. However, when used 


for input, expressions in the (expression part) must be (variable)s only. 


The input (list declaration) specifies a list of variables to be initialized 
and also designates the order. The input (list) may consist of any or all of the 


following constructs: variables, list identifiers, and FOR clauses. 


Variables are of two types: simple and subscripted. Both are single valued. 
They form the basic element of a list declaration, and may be either local or 
non-local to the (list declaration) block. If local, their declaration must 


precede the (list declaration) in which they appear. 


if a (list declaration) contains variables whicn have already been declared in 
another (list declaration), it is not necessary to list them again. Use of the 


previously declared (list identifier) is sufficient. Recursive use of (list 


identifier)s is meaningless and not allowed. 
The (for clause ) is used to initialize arrays either in whole or in part. 
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READ STATEMENT 


Syntax: 

(I-O statement) ::= (read statement) | (release statement) | (write statement) 
(read statement) ::= READ ( (input parameters) ) 

(input parameters) ::= (file identifier) , (format identifier) , (list) 
Examples: 


READ (FILE1, FORMAT2, LIST3) 

READ (FIN1, FORM], FOR IeO STEP 1 UNTIL 13 DO HEAD [T]) 
READ (F6, FORM3, VARY5) 

READ (FILL1, MAT2, U, V, W, X, VARY1) 

READ (F2, F3, Ll) 


Semantics: 


Thus far, three kinds of declarations have been discussed: file declaration, 
which creates and initially fills input buffers with data; format declaration, 
which describes the editing to be performed on the data found in an input 
buffer; and list declaration, which provides the names of variables to be given 


initial values. 


The <read statement> calls for the actual initializing of variables by associating 
a set of these declarations. A list of variables can be indicated in two ways. 

The programer can write a <list declaration> and use the <list identifier> as 

an input parameter, or he can include the list of variables in the <read statement> 
itself. 


The reading process is illustrated below: 


READ (FILE1, FORMAT2, LIST3) 


FILE] declaration FORMAT2 declaration LIST3 declaration 
Picked up Edited by Stored according 
at FILE! FORMAT? to LISt3 


EDITED PRT 


Next Buffer 
EDITED STACK 


Since the (file declaration) precedes the read statement, the buffer is already 


filled with data before the read statement is first encountered. If more than 
one buffer is being utilized, they are sequenced so that a first-in, Pirst-out 


operation results. 


The data is selected and edited according to the (format declaration). The 

number of words represented by the sum of the (field width)s in the (editing 
specifications) of the (format declaration) is normally equal to the (buffer size) 
in the (file declaration). In all cases, it must be equal to or less than (buffer 


size). 


The data which is to be stored is then put in the locations previously assigned 
to the variables in the (list). 


The reading process is terminated when all variables in the (list) have been 
initialized. More than one unit of input, card or magnetic tape record, may be 


used with a single read statement. 


An additional unit of input is called for each time one of the following occurs 
before the (list) is exhausted: 


1. <A slash is encountered in the format declaration. 


2. The end of the format declaration is reached. 


12 


The slash is used when formats differ from card to card or from tape record 

to tape record. After a slash has caused an additional unit of input to be 
read, subsequent data is formulated according to the (editing segment) to the 
right of the slash. Two adjacent slashes cause one unit of input to be ignored. 


One slash at the beginning or end of a format declaration has the same effect. 


When all editing phrases have been used before the (list) is exhausted, editing 


of the next unit of input proceeds from the beginning of the format declaration. 


After reading is completed, the bpuffer(s) used in the process is automatically 
refilled, and all buffers are properly sequenced in anticipation of the next 


statement involving this file. 


PROBLEM 1. To demonstrate the use of the type-A editing phrase and the (string) 
phrase, assume the program makes use of a heading used for a printout which 
varies from run to run. Assume this information includes the date, the name 

of the person using the program, and his department number. Input is froma 
card punched in alpha mode and the date is in columns 1-20, the name is in 


columns 28-55, and the department number is in columns 63-80. 
Selected portions of the program might appear as follows: 


BEGIN 
ARRAY HEAD [0:13]; INTEGER I; 
FILE IN FIN1 (1,10); 
FORMAT IN FORM] (13A6, A2); 
READ (FINI, FORM], FOR I#O STEP 1 UNTIL 13 DO HEAD[I]) 
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The punched card from which the buffer is filled reads as follows: 
Cole 
1 10 20 30 ho 58) € 70 60) 
DATE: bbNOV.b22, b1962bbbbbbbNAME: bbTHEODOREDI . bWENDELLbbbbbbbbbDEPT: bbENGINEERING 


b eedet 


pi een eigenen Pere eee 
INPUT BUFFER VARIABLE LOCATIONS 
FIN 1 EDITING PHRASES HEAD [I] 


BSaBBEEo 16 EEBRGoAS 
fv] [o}etel |p A6 of of of wfofv] fp. 
16 olla folio 
16 peeesogd 
1 ofofafofofsfalu 
6 ofall fofo la 
1306 bac ofofafopolof ale 
16 ofofeley Pepe 
A ofofpofalcfcfe 
X afefopopofopope 
16 ofolofofalsfela 
bes ofol: folol=hala 
As ofofzpxfefel=| = 
a2 of ofofofofolnta| 


PROBLEM 2: To Allustrate the input of numeric and Logical initial values, consider 


the following program elements. Assume that input is from an alpha card read. 


Note that the contents of two buffers are used to initiate variables with one 
(read statement). As a consequence, the editing specifications are used twice. 


The sum of the field widths in FORM8 is equal to 80, which is equivalent to 10 
words, the buffer size of FO. 
BEGIN 

BOOLEAN ARRAY B [0:4]; 

BOOLEAN Al, A2, A3, A4, ADS; 

RAT oy. Vie Zi Dg Se Se 

INTEGER I, J, K, L, M; 

FILE IN F6 (2, 10); 

FORMAT IN FORM3 (2E10.3, F8.3, I6, 113, X8, 5L5); 


LIST VARY (X,Y,Z,1,J,FOR MeO STEP 1 UNTIL 4 Do B[M], X1, X2, X3,K,L, 
Al, A2,A3, A4 a5): 


READ (F6, FORM3, VARY5 ) 


COL. 


pO.645, +02+0.165, bO2+735 .125-13892bbbbbb—1364214137 .93 1 FALSEbTRUEbTRUEbTRUEF ALSE 


Col. 
1 


—0.173, +07-1.000, +07bb16 . 250b+14.16b549755813887bb-3 . 692bTRUEFALSEFALSEbDTRUEFALSE 


The cards from which the buffers are filled are as follows: 


10 20 30 lp 50 60 70 


10 20 Se) Fe) 50 0) #0) 


INPUT BUFFERS EDITING PHRASES VARIABLE LOCATIONS 
F6 FORM3 VARY5 


FS .3 
F-+00] 0000000033104 


9 fb | 

[143 [6{4 72) ort 
LEStT] 19) L5 OOOO0000000000 
if L5 OO00000000001 
ElolTin(ulefoinl [E 5L5 L5 0000000000001 
RIUIELFIAILISI[E] [8 L5 OOOO0O0O00000001 


OOOQOQO0000000 


1F4++00] 0000000000001 


15 
DL Lb 
7) 
L5 F4++00 


60) 


80 


PROBLEM 3. This problem illustrates the use of the binary-type editing phrases. 


Normally, input is from magnetic tape which has been produced by another program 


and recorded in the binary mode. 


The relevant ALGOL construct might be as follows. 
BEGIN 
BOOLEAN Y1, Y2, Zl, 22; 
REAL T, U, V, W, X; 
INTEGER M, N, 0; 
FILE IN FILL (1,11); 
FORMAT IN MAT2 (80, 2X); 
LIST VARY1 (1, Y2,Z1, 22); 


READ (FILL1, MAT2, U,V,W, X, VARYL) 
i 


INPUT BUFFER EDITING PHRASES VARIABLE LOCATIONS 


FILIA MAIO VARY1 

0 U 

| F4+~16 [7342100521306 | O 7342100521306 | Vv 

| F——O7 |1056733520000, 0 F—O7 [1056733520000 W 

| FL—12 [5632100000000 | O [F—12 [5632100000000| X 
++00 0 Y1 
++00 0 F++00 Ye 

0 Za: 
++00 [ OOO0000000000 0 F++00 72 

Xx none 

F4++00 X 


PROBLEM 4. 


To illustrate the use of a (for clause) in a (list declaration), 
consider the following problem: 


A 2-dimensional array A exists, and it is now desired to establish new values for 


two of its rows. These values are read in from an alpha punched card. 


BEGIN 
ARRAY A [O:4, 0:2]; 
FILE IN Fe (1,10); 
FORMAT IN F3 (6E13.6); 
LIST L1 (FOR STEP 1 UNTIL 3 DO FOR J+O STEP 1 UNTIL 2 DO A[I,J]); 


READ (F2, F3, Il) 


The card from which the buffer is filled reads as follows: 
Col. 
1 10 20 30 lo 50) 60 #0) 8 


bO .645000, +02+0 .165000, b05+0 .173000, +07+0.735125 , b03+0 .136421, +06+0 .162500, +02bb 


EDITING PHRASES 


VARIABLE LOCATIONS 
Fe F3 


Ol +10] . {1} 6] 2] 5) 
ofol  [+fo 2} mI | 


E13 .6 Ft-12 A[2,0] 

E13 .6 A[2,1] 

E13 .6 Al 2,2] 
6.E13.6 

E13 .6 A[3,0] 

E13 .6 A[3,1] 

E13 .6 A[3,2] 


16 


SUMMARY OF READ STATEMENT. The (read statement), together with its associated 
file, format, and list, has been designed to take care of input conditions which 


occur in scientific problems. 


The programer, however, is not required to use the (read statement). He has 

the option of filling the input buffer or buffers by using the (file declaration), 
and then operating upon the buffer contents with a STREAM PROCEDURE in any way 
desired. Im order to do this, the file identifier is passed as an actual parameter 
to a STREAM PROCEDURE. 


When the reading process connected with a (read statement) is completed, the 
affected buffer contents are automatically destroyed by the input of more data. 
A statement to cause the refilling of input buffers is needed, therefore, when 


the (read statement) is not used. The (release statement) serves this purpose. 


INPUT RELEASE STATEMENT 


Syntax: 


(release statement) ::= RELEASE ( (file identifier) ) 
(stream release statement) ::= RELEASE ( (formal parameter) ) 


Examples: 


RELEASE (FILE3) 
RELEASE (FILLS) 
RELEASE (F) 


Semantics: 


The input (release statement) causes one input buffer of the file indicated 
to be filled with new data. If more than one buffer is being used, a reordering 


occurs which maintains the first-in, first-out operation. 


The release statement is the only part of Extended Algol dealing with input - 
output which may be included in a STREAM PROCEDURE. When so used it is 
metalinguistically referred to as a (stream release statement). It looks the 
same wherever it is used. The difference in syntax is to point up the fact 
that in a STREAM PROCEDURE a formal parameter must be used to indicate the 
file rather than the file identifier itself. 
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PROBLEM 1. To illustrate the buffer-ordering procedure, assume an input file which 
uses three buffers. Only one name is used for all three buffers; therefore, some 
means is required to distinguish between them. The means employed can be visualized 
as a pointer, which at any one time is directed toward the buffer which will be 


used if the file is called for. 


BEGIN 
FILE IN FILE3 (3,10); 


This would result in three cards being read into the buffers. The pointer is at 
buffer 1 as soon as that buffer is filled. 


POINTER 


STREAM PROCEDURE EDIT (A,B,C); 
BEGIN 
- - - - RELEASE(A);- - - - 
END; 


RELEASE (FILE3); EDIT (FILE3,KEY, TABLE); 
END 


Any use of the file identifier (FILE3 ) at this point refers to buffer 1. Either 
the (release statement) or the (stream release statement) above would result in 


the pointer being shifted to buffer 2. Then buffer 1 would be refilled with the 


contents of card }. 


Since a read statement has an implied release at the end of its operation, the 
effect on the buffers is the same. 


EB BUFFER 
1 
CARD 5 


BUFFER POINTER 
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SECTION TWO 


OUFPUT 


Output is the means by which the program communicates the results it has 
obtained to the programer. The B 5000 provides several types of equipment 
through which output can be recorded: line printer, card punch, magnetic 
tape, and plotter. The storage drum and message printer are reserved for use 


by the MCP and its associated compilers. 


Due to the variety of possible output communications, several formats are 
available to the programer. Numeric values, for instance, may be expressed 


as integers, decimal numbers, or decimal fractions with an associated power of ten. 
The information to be externally recorded normally involves the values of 


certain variables in the program. 


Pitti ats. oS Tene He aes ads A Seen + $ ‘ 
every communication to specifically designate the output equipment 


format, and the expressions to be evaluated. 


PRY 


STACK 


| > EXPRESSION 
EXPRESSION 


MAGNETIC 


THE OUTPUT PROCESS 
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The fact that a program involves output is indicated by means of an output 
(file declaration). The output (file declaration) results in the establishment 


of output buffers in memory. 


Actual output is called for by a (write statement). This statement causes the 
expressions in the (list declaration) to be evaluated and stored into the output 


buffer in the form indicated by the associated (format declaration). 


When a buffer has been filled,the data is transmitted to the specified output 


equipment. 


Designation of Output Equipment Type 


Whether results are to be punched, plotted, printed, or recorded on magnetic 
tape is specified by the program parameter card. This card informs the MCP 
that a program is ready for processing, and provides sufficient information 


to enable the MCP to schedule it. 


The contents of the program parameter card are not a part of the program; there- 
fore they are not expressed in Extended ALGOL. This information is a message 
from the operator of the system to the MCP. The message contains a complete 
list of (file identifier)s which appear in the program and the type of output 
equipment to be used by each. 


As a consequence, it is not necessary to alter the program, even though the 
peripheral equipment may change from run to run. Therefore results may be 
printed during one run and recorded on magnetic tape during the next run, 


using the same program. 


2] 


The Programing Language 


OUTPUT FILE DECLARATION 


Syntax: 

(file declaration) ::= FILE (input or output) (file part) 

(input or output) ::= IN | OUT 

(file part) ::= (file identifier) ( (buffer part) ) | (file part) , 
(file identifier) ( (buffer part) ) 

(buffer part) ::= (number of buffers) , (buffer size) 

(number of buffers) ::= (unsigned integer) 

(buffer size) ::= (unsigned integer) 

(file identifier) ::= (identifier) 

Examples: 


FILE OUT RESULTS (2,115), ANS (1,1) 
FILE OUT PRINT (2,15) 


Semantics: 
The only difference in syntax between an input (file declaration) and an output 
(file declaration) is (input or output). They both result in the establishment 


of buffer areas in memory. 


The output (buffer size) must be sufficiently large to contain the contents of 


one unit of output. These minimum sizes are as follows: 


Line Printer 1 line 15 words 

Card Punch 1 80-Col. Card 10 words 

Magnetic Tape 1 record May vary from 1 to 1023 words 
Plotter 1 point 1 word 
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OUTPUT FORMAT DECLARATION 


Syntax: 
(format declaration) ::= FORMAT (input or output) (format part) 
(input or output) ::= IN | OUT 
(format part) ::= (format identifier) ( (editing specifications) ) | 
(format part) , (format identifier) ( (editing specifications) ) 
(format identifier) ::= (identifier) 
(editing specifications) ::= (editing segment) | (editing specifications) / | 
/ (editing specifications) | (editing specifications) / 
(editing segment ) 
(editing segment) ::= (editing phrase) | (repeat part) [ (editing specifications) ] | 
(editing segment) , (editing phrase) | (editing segment) , 
(repeat part) [ (editing specifications) ] 
(editing phrase) ::= (repeat part) (editing phrase type) (field part) | (string) 
(repeat part) ::= (empty) | (unsigned integer) 


(editing phrase type) ::=A]D/E|F]zr]2Ln]{o]P|x 
(field part) ::= (empty) | (field width) | (field width) . (decimal places) 
(field width) ::= (unsigned integer) 


(decimal places) ::= (unsigned integer) 
Examples: 


FORMAT OUT F6 (X56, "HEADING", X57),F7 (P4.1) 

FORMAT OUT F8 (X5,F5.1,2[X14,F11.3],xX60),F81 (1023 0) 
FORMAT OUT FQ (X4,T4,X8,F7.1,X12,F9.1,X76),F91 (8E15.4) 
FORMAT OUT FLO (X6, "N", X12, "L",x19, "S", x80) 

FORMAT OUT Fll (3[X6,H10.2], x72) 


The output (format declaration) defines the editing necessary in order for 
the output to be meaningful. The output buffer may be filled with either 
6-bit characters or 48-bit binary words. The function of the output (format 
declaration) is to indicate where and in what form the values of the list 


expressions are to be placed. The (editing phrase) accomplishes this task. 
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An output (editing phrase) may be in either of two forms. In the first form, 
the (repeat part) of the (editing phrase) is an integer which indicates the 
number of times an (editing phrase) is to be used. If the (repeat part) is 
(empty), it is taken to be equal to one. The purpose of the (repeat part) 
is to eliminate the need for consecutively duplicating the same phrase. A 
series of (editing phrase)s may also be designated for repetitive use by 
enclosing the set in square brackets. The number of uses is denoted by an 


integer immediately preceding the left bracket. 


Fach use of an (editing phrase) of this form, except the X and D types, takes 
the contents of one computer word as the expression value to be edited and stored 


into the output string. 


The controlling factor in an (editing phrase) is the (editing phrase type). 
There are nine different output types which are grouped into three categories: 
one for those which produce alphanumeric output, one for those which produce 


binary output, and one designed for producing output for the plotter. 


The (field part) of the (editing phrase) indicates the number of characters in 
the output buffer to be filled. It may, also, in the case of numbers, indicate 
the need for a decimal point and the number of digits after the decimal point. 
For plotter output, the (field part) does not control the amount of the output 
buffer to be filled, but indicates how the plot is to be accomplished. It 
serves no:function in the binary-type editing phrases (0 and D). 


The second form of an (editing phrase ) is a (string). This functions as a 
literal; that is, output data is supplied by the (editing phrase) itself and 


not by an expression value of the program. 
ALPHANUMERIC (EDITING PHRASE TYPE)S 


The following are alphanumeric types: A,E,F,I,L and xX. These types are used. 
for editing data, so that it is in alphanumeric form for output. This form 
of output is used for the line printer, the card punch and magnetic tape unit 
(alpha mode). This data can be expressed in several ways, which are syntac- 
tically defined as follows: 


an 


(character output data) ::= (string output) | (numeric output) | (logical output) | 


(character output data) (string output) | 
(character output data) (numeric output) | 
(character output data) (logical output) 
(string output) ::= (any sequence of characters) 
(numeric output) ::= (single space) (unsigned numeric output) | 
~ (unsigned numeric outout) | (space) (numeric output) 
(unsigned numeric output) ::= (decimal number) | O (decimal fraction) 


(scale factor) 


(scale factor) ::= , + (exponent) | , - (exponent) 

(logical output) ::= TRUE | FALSE | (space) (logical output) 

(decimal number) ::= (unsigned integer) | (unsigned integer) (decimal fraction) | 
(decimal fraction) 

(decimal fraction) ::= . (unsigned integer) 

(exponent) ::= (digit) (digit) 


The above syntax is not a part of Extended ALGOL but is only a description of 
forms of output possible from a program written in Extended ALGOL which uses 


the (format declaration). 


Examples of Character Output Data 


(string output) (numeric output) 
ALGOL 13892 
Y= bolLh16 
(logical output) W735 .Le5 
bTRUE bb=735 .13 
FALSE 
b0.645, +02 
bb+0 .64500, +02 


In these examples the numbers are separated into three groups: integers, numbers 
with a decimal point, and numbers with exponents. The (editing phrase type)s 

used with these numbers are respectively, I, F and E. Type A and the (string) 
editing phrase are used for (string output), and type L is used for (logical output). 
Type X serves to place blanks in the output string. The effect of these types is 


shown in the following illustration. 


2) 


Assume that the following expression values are to be punched in a card. To 


illustrate how the (editing phrase type)s function, the following (format 


declaration) will be applied. 


FORMAT OUT F2 (A5,A2, 2L5, 216, X10, F8.3,F9.2,E10.3,E14.5) 


EXPRESSION VALUES EDITING PHRASE 


| Of O PJ AL LG] OL | 
| Of 0 fof of ofo} yf = 
| F4++00] 0000000000001, 
F'44+00| 0000000000000) 
REScLOC OER ERO g 
| 0000000002610) 


none ———————— X10 

| F+~11] 1337100000000! FS .3 
| F——11] 1337100000000} F9.2 
1 E10.3 


1004000000000 
1004000000000 


cm rm 


BINARY (EDITING PHRASE TYPE) 


CHARACTERS PRODUCED 
FOR OUTPUT BUFFER 


ALGOL 

Y= 

bTRUE 
FALSE 
~13892 
bb1416 
bbbbbbbbbb 
b739-125 
bb—735 .13 
bO.645,+02 
bb-O .64500, +02 


Types O and D are binary (editing phrase type)s. Type O is used when output is 


desired which identically reflects the expression values as used in the program. 


No conversion takes place. Type D inserts a zero value 
types are used only for recording data on magnetic tape 


this case, the (field part) is irrelevant and should be 


PLOTTER (EDITING PHRASE TYPE) 


Type P is designed for producing output for the plotter. 


into the output. These 


in the binary mode. In 


(empty) . 


It differs from all other 


types in that a pair of expression values (instead of one) is used to develop each 


element of the output string. All information necessary for plotting one point 


is contained in one word. Therefore the P type produces one word in the following 


form: 


Ofc] s[ X{ XY] ¥[¥ 
where: 


The first character is irrelevant 


26 


whether or not to allow paper to m 
3. whether or not to print the units digit of the ordinate value. 
This digit (c) is developed from the (field part) of the (editing phrase). 


The effect of various (field part) values is shown in the following table. 


ALLOW GRID ALLOW PAPER TO BE PRINT UNITS DIGIT 
(field part) TO BE PRINTED MOVED BEFORE PLOT OF ORDINATE VALUE 
O Yes Yes No 
1 Yes Yes Yes 
2 Yes No No 
5 Yes No Yes 
h No Yes No 
5 No Yes Yes 
6 No No No 
it No No Yes 


The third character (s) determines the plotting symbol and is obtained from 
the (decimal places) of the (editing phrase). The symbols available are 


shown below. 


(decimal places) PLOTTING SYMBOL 
0 V4 
Ht aX 
; Oo 
3 
4 (random symbol ) 


The fourth and fifth characters are two decimal digits which stipulate the 
X-abscissa increment. These digits are the decimal equivalent of the first 


expression value, which may vary from O to 99 decimal. 


The direction of paper movement depends on the sign of this expression value. 
If paper movement is allowed by the control digit, forward movement takes 
place when the sign is positive; movement is backward when the sign is 


negative. 


The sixth, seventh, and eighth characters are three decimal digits which 
stipulate the Y-ordinate value to be plotted. These digits are the decimal 


equivalent of the second expression value, which may range from O to 399 


decimal. 
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iSfo) 


The (editing specifications) of an output (format declaration) must not contain 
a mixture of (editing phrase type)s; that is, they must be either entirely alpha - 


numeric, binary, or of the plotter type. 


The table which follows summarizes the actions of the (editing phrase type)s. 


when expression value is to be represented one binary word one field of characters 
as a logical value 
none one field of characters 


Xx for inserting blank characters in output string 


FORM OF EDITED FORM 
TYPE WHEN USED ° EXPRESSION VALUE FOR OUTPUT 
ALPHANUMERIC 
when expression value is alpha in form one alpha word one field of cnaracters 
EK when expression value is to be represented one binary word one field of characters 
as decimal fraction with an exponent 
F when expression value is to be represented one binary word one field of characters 
as decimal number without exponent 
I when expression value is to be represented one binary word one field of characters 
as an integer 
ae ee | 


BINARY 


one binary word 


one binary word 


when expression values are to be communicated 
in exactly the same form as they appear in 
the program 


for inserting zero words in output string none 


binary word 


PLOTTER 


when expression values are to be plotted two binary words one alpha word 


OUTPUT LIST DECLARATION 


Syntax: 
(list declaration) ::= LIST (list part) 
(list part) ::= (list identifier) ( (list) ) | (list part) , (list identifier) 
( (list) ) 
(list identifier) ::= (identifier) 
(list) ::= (list segment) | (list) , (list segment) 
(list segment) ::= (expression part) | (for clause) [ (expression list) ] | 
(for clause) (list segment) 
(expression part) ::= (arithmetic expression) | (list identifier) | 
(Boolean expression) 
(expression list) ::= (expression list) , (expression part) | (expression part) 
Examples: 


Lic? PLOT" y) 
LIST ANS (P+Q,Z,SQRT (Z), A[I]) 
LIST Ll (FOR I+O STEP 1 UNTIL T DO FOR J«O STEP 1 UNTIL U DO A[I,J]) 


Semantics: 


The output’ (list declaration) specifies a list of expressions, the values of 
which are to be included in one output communication. The expression values 
are placed in the output string in the same order as their corresponding 


expressions in the (list declaration). 


A (for clause) may be used to reduce the amount of writing required when the 


elements of an array are included in the output. 


If a (list declaration) contains expressions which have already appeared in another 
(list declaration) , it is not necessary to list them again. Use of the pre- 
viously declared (list identifier) is sufficient. Recursive use of (list 


identifier)s is not allowed. 
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WRITE STATEMENT 


syntax: 
(write statement) ::= WRITE ( (output parameters) ) 
(output parameters) ::= (file identifier) (format and list part ) 
(format and list part) ::= , (format identifier) (list part) | (empty) | 
[ (carriage control) ] (format identifier) (list part) 
(list part) ::=, (list) | (empty) 
(carriage control) ::= (skip to next page) | (skip to channel) | (double space) | 
(no space) 
(skip to next page) ::= PAGE 
(skip to channel) ::= (unsigned integer) 
(double space ) ::= DBL 
(no space) ::= NO 
Examples: 


WRITE (A,C,M) 

WRITE (C[ DBL]F2) 
WRITE (F2 [3]FORM, L2) 
WRITE (F5 [ PAGE]) 
WRITE (FILE2) 
WRITE (FOUT2, FORM2,FOR IeO STEP 1 UNTIL 13 DO HEAD[T]) 


semantics: 


Three kinds of declarations have been presented: file declaration, which 
establishes output buffer areas in memory; format declaration, which describes 
the form of the data needed for output; and list declaration, which provides 


the expression values that are to constitute the output. 


The (write statement) serves to identify the specific place in the program where 
output is to occur. It also associates the declarations necessary for producing 
a given output. The (list declaration) is not required. The (list) can be 


specified directly in the (write statement). 
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More than one unit of output: printed line, punched card, magnetic tape record, 
or plotted point can be produced with a single write statement. An additional 
unit of output is called for each time one of the following occurs before the 
(list) is exhausted: 


1. A slash appears in the format declaration 


2. The end of the format declaration is reached. 


The slash is used when units of output are to be given different formats. A 
format is assigned to each unit of output, according to the editing phrases 
contained between slashes. Two adjacent slashes produce a blank Line when 
printing, or a blank card when punching. One slash at the beginning or end of a 


format declaration has the same effect. 


When all editing phrases in a format declaration have been used before the (list) 


is exhausted, editing of the next unit of output proceeds from the beginning. 


The (write statement ) may be expressed in several forms and perform a different 


function for each. The most common form is: 


WRITE (FILE2, FORMAT3, LIST1) 


This form is used when the output contains expression values. The process in- 


volved is shown in the following illustration. 


LIST1L DECLARATION FORMAT3 DECLARATION FILEe DECLARATION 
(Selected Values According (Edited by FORMATS) (Stored in FILE2) 
to LIST) 


PRT iidited 


Array ss Edited 


The expressions contained in the (list) are evaluated one at a time, from left 


to right. Their values are then edited according to the (format declaration). 


The (editing phrase)s are applied to the expression values in left to right 


order and placed in the output buffer in the same order. 
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The writing process is completed when all expressions in the (list) have been 
evaluated and the values placed in the output buffer. If the buffer has not 
been filled and the next (editing phrase) is a (string), the (string) is placed 
in the buffer. In any case, the bottom of the buffer will be filled with blanks 
if the number of characters affected by the format declaration is less than 

the buffer size. After the buffer is filled, its contents are transferred to 
the output device automatically. 


Another form of the (write statement) is one in which the (list part) is empty. 
This construct occurs when the entire output buffer is to be filled with data 
obtained from the (format declaration). Therefore, the (editing specifications) 
must contain only X-type and (string) editing phrases. No expression values 
are involved. This kind of output would occur, for instance, when headings 

are being printed. 


WRITE (FILEL, F2) 
WRITE (FILE2[ DBL ]FORM) 


The (carriage control) has meaning only when output is being produced on a line 
printer. It serves to activate the carriage control tape on the line printer 
after printing a line. If other than a line printer is being used, the (carriage 
control), if any, is ignored. 


WRITE (F2[ 3 ]FORM, L2) 


Several options are provided for (carriage control). If an integer is given, 

the tape skips to the next hole in the channel indicated by the integer. Channels 
are numbered from 1 to 12. If [DBL] is used, a double space occurs after printing. 
When no (carriage control) is present in a (write statement) which produces line 
printer output, the paper is single spaced after printing. If [PAGE] is used, 

the paper skips to the top of the next page (channel 1). [NO] will result in 

no spacing of the paper. 


When it is necessary to space the paper before printing, the following form of 


(write statement) is used: 


WRITE (F2) 
WRITE (F2[ PAGE J) 
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PROBLEM 1. To illustrate the use of the type-A editing phrase, assume the same 
problem that was presented in Problem 1 of the Input Section. In that case, the 
date, programer's name, and department were read into an array called HEAD. Now 
consider what language is necessary to print that information. First assume it 
is all printed on one line and the next print line is controlled by channel 3 of 
the carriage control tape. Selected portions of the program would then be as 


follows: 


BEGIN 
ARRAY HEAD [0:13]; INTEGER I; 
FILE OUT FOUT2 (1,15); 
FORMAT OUT FORM2 (X8,13A6, A2); 
LIST LOUT2 FOR IeO STEP 1 UNTIL 13 DO HEAD [I]); 


WRITE (FOUT2[3] FORM2, LOUT2) 


EXPRESSION VALUES EDITING PHRASES OUTPUT BUFFER 
HEAD [I] FOUT2 
x8 Ib] b 
A6 DY Al T 
A6 Ot VI. | 
A6 1{ 9] 6. 
A6 |b | 
A6 | b} 7 
A6 REE 
13A6+— AG IN| Di E] 
A6 'b| DI b, 
A6 IP] : | 
A6 
AG 1b} b] D| 
A6 Mb |b] | 
A6 Ib] bb. 
A2 fo |b] b. 


0 2 30 Te) 50 60 72 0) 


DATE: NOV. 22, 1962 NAME: THEODORE I. WENDELL DEPT: ENGINEERING 


6 
Since the editing part of FORM2 affects only 88 characters, the last 32 blanks 


are supplied automatically to fill the buffer. 
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The following example assumes the heading information is printed with different 
formats on three different lines. Selected portions of the program might appear 


as Follows: 


BEGIN 
ARRAY HEAD [0:13]; INTEGER I; 
FILE OUT FOUT2 (3,15); 
FORMAT OUT FORM2 (X10, 4A6/X.7,5A6/X2,5A6); 


WRITE (FOUT2, FORM2, FOR I*O STEP 1 UNTIL 13 DO HEAD [T]); 
WRITE (FOUT2 [3]) 


EXPRESSION VALUES EDITING PHRASES OUTPUT BUFFERS 
HEAD [1] FOUT2 
comic 
ofotntoftt te te 
V A6 
‘| of] 91 vam 
| fb} bY b| e AG 
none AG 
lO} 0} | No srotetetetotete > |b] 
of ofw[ofe[t epelelelelppepy| Patetetele 
none x2 ve bibl bibl bi bl bl] bt bi bi bi bibl | ceo : 
0} 0] a ol ol pi pts b b photo fe SEE O EEE 
of of cp} el el R[T = B tb 


COL. 
1 10 x 50) ho 5 & 70 80 
9 DATE: NOV. 22, 1962 
3 NAME: THEODORE I. WENDELL 
° DEPT: ENGINEERING 
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PROBLEM 2. To illustrate the output of numeric and logical values, consider the 
following: Assume that output is produced by the line printer. One line is to 
be printed with single spacing after printing. The variables and their values 
are taken from Problem 2 of the Input Section. 


BEGIN 

BOOLEAN ARRAY B [0:4]; 

BOOLEAN Al, A2, A3, AX, A5; 

REAL -X; >: Zs AX, ROp Gs 

INTEGER I, J, K, P; 

FILE OUT FI1 (1,15); 

FORMAT OUT Fo2 (18, 3[X3,12], 2L8, 2a[x4,19], a[x4,I7], x4, F8.2, x4, EL4.6, x3) 

LIST LI3 (NOT B[3], FOR BRO STEP 1 UNTIL 2 DO BIP], B[4] AND Ad, 
(Al OR A2) AND (A3 OR AS), J-I, XxY+X1, IF K> 1000 THEN K ELSE 
1000, SQRT ( (-x2)/10), X3, Z); 

WRITE (FI1, FO2, LI3) 
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gt 


ARRAY B 


A 4 OH Os BS SN KO & = 3 i > 


BLO] 
BL 1] 
BL 2] 
BL3] 
BL 4] 


FALSE 


VARIABLE LOCATIONS 


F++00 0000000000001 
F++00 OQOQO00O000000000 


F+00 0000000412345 
F++00 0000000002610 


EXPRESSION VALUES 


NOT BL3] F+4+00 000000 


OQO00000 L8 
ne X35 


B[P] 


J-I 


X41 19 


6000000 


IF K>1000 F++00 0000000002610 I7 


SQRT ( (~X2)/10 


X3 


none 


F4++00 OOOQO0000000000 


none 


F4++00 OQ000000000001 


none ——$—$—$$___—_$___—_—_ X3 


F++00 0000000000001 
F4++00 OQOOQOQO000000000 
F++00 QOOOQO000000000 


none 


F-+00 0000000357241 19 


none 
none 


none 


F+-11 1750000000000 


none 


F+—13 2020000000000 


none 


none 


The resulting line of print would appear as follows: 


fe) ] 1 FALSE 


FALSE 


~—122529 


~665750 


EDITING PHRASES OUTPUT BUFFER 


BUBB E BEE 
ISDEDEES 


Ta 3103522] 


218 


X4 2[ x4, 19] 


x4 


x4 2[X4,17] 
7 

x4 

F8.2 

x4 


Z F+=11 1337100000000 E14.2 


X38 


1416 1000 16.25 0.735125, +03 


PROBLEM 3. This example describes the process of output to the plotter. Assume 
that values have been computed and stored in an array. A program for plotting 


the above results would appear in part as follows: 


BEGIN 
ARRAY WL0:10]; 
INTEGER X, I; 


FILE OUT F(2,1); 
FORMAT OUT FM (P5.3); 
LIST PT(FOR IeO STEP 1 UNTIL 10 DO[X,wW[I]x100]); 


x1 5 
WRITE (F, FM, PT) 


This write statement will result in the plotting of eleven points. The symbol 
used is a small circle. The printing of a grid is inhibited since the plotting 
paper is pre-printed. Each point is plotted one increment of spacing (.025 inches) 
to the right of the previous point. The printing of the least significant digit 
of each ordinate value is designated. This digit is printed directly under the 
associated point at the bottom of the page. | 


SUMMARY OF WRITE STATEMENT. The write statement and the associated file, format 
and list have been designed to accommodate output requirements for scientific 


problems. 


The programer, however, is not restricted to the output features available to him 
in the write statement. He has the option of creating output buffers by use of 
the file declaration and then filling those buffers in any way desired. This is 
done by writing a STREAM PROCEDURE to fill the buffer instead of a format declara- 
tion. The file identifier is then used as an actual parameter to the STREAM 
PROCEDURE. 


af 


When the write statement is used, automatic transfer of data from buffer to 

output device is accomplished as soon as a buffer is filled. Therefore a 
statement to initiate this transfer is needed when the write statement is not used. 
Such a statement is the release statement with an output file identifier as a 


parameter. 

OUTPUT RELEASE STATEMENT 

Syntax: 

(release statement) ::= RELEASE ( (file identifier) ) 


Examples: 


The output release statement causes the contents of one output buffer to be trans- 
ferred to the appropriate output device. If more than one buffer is being used, 


a reordering occurs which maintains the first-in, first-out operation. 


PROBLEM 1. To illustrate the buffer-ordering procedure, assume an output file 
which uses two buffers. Since there is only one name (file identifier) for both 
of these buffers, some way is needed to distinguish between them. The means 
employed is a pointer, which is pointing at the buffer to be used the next time 
the file is called for. 


BEGIN 
FILE OUT F2 (2,15); 


This would establish two output buffers, each 15 words in length. 
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POINTER BUFFER 


BUFFER 


RELEASE (F2); 


Any use of the file identifier (F2) at this point in the program refers to 
buffer 1. The release statement results in the pointer being shifted to buffer 
2, and the contents of buffer 1 being transferred to the line printer, assuming 


it to be the specified output device. 


Since a write statement has an implied release at the end of its operation, the 


effect on the buffers when it is used is the same as shown here. 


POINTER 
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APPENDIX A 


ree 


The following information is presented here for reference purposes only. A 
complete description of the B 5000 is contained in The Descriptor, Bulletin 
5000 -20002-P. 


There are two basic forms in which data can be represented in the B 5000. This 


manual depicts them as follows: 


NUMERIC OPERAND 
BITS: 48° 47 46 -45 39 4 


Mantissa 
13 Digits 


tion Flag 
Mantissa 
Exponent 
Exponent 


Z| 
ray) 
oO 
“dd 
Gy 
“4 
—p 
. 
ie) 
HH 


in the above form. 
The exponent and mantissa are composed of octal digits and each illustration contains 


the octal values. 


CHARACTER WORD 
BITS 48 4342 3736 3130 2524 19181312 76 1 


Character 
Character 
Character 
Character 


& 
iD) 
ae) 
2) 
a) 
HH 
yy 
G 
O 


Character 


4 
iD) 
7s) 
O 1G 
eo yp 
MIG 
aha 
Oo |e 


Character 


Ae 
40 
i. 
co) 
S 
ov 
dp) 


The illustrations which show alphabetic data are in the above form. Each character 
is composed of 6 bits. 


Xe) 


APPENDIX B 


PROBLEM SOLUTIONS 


An Introduction to Algol 60, Bulletin 5000-21001-P, (June 1961) contains sample 
problems. The solutions to these problems do not include the input-output portion 
since the language was not completely formulated at that time. The complete 


solutions to those problems are given below. 


EXAMPLE 1. Assume that the results are printed with the following format: 
1 5 10 56 © 8 30 3 WW % 50 5 6 6 TO GB OM & 


248070. 762 103497 .000 


The program will then be: 
BEGIN 
REAL X,Y, YPRIME; 
FILE OUT A(1,15); 
FORMAT OUT C (X5,F5.1,2[ x14, F11.3]); 


FOR XO STEP .5 UNTIL 12 DO 
BEGIN 
YeX*5— (X¥3) /H-Lx X¥O+21xX-5 .238; 
YPRIME5 x X*4— (3xX*2) /4~8xX+21 
WRITE (A,C, X,Y, YPRIME) 
END 
END 


hy 


Example 2. Assume the results are printed with the following format: 
COL, 
1 '5) 10° 15 ©. BS D@ BS © | BD D&D O G@ Pf 


oO 
Oo 
Oo 
oO 
oO 
\e) 
oO 
oO 
Le) 
oO 
Oo 
oO 
Oo 
oO 


The program will then be: 


BEGIN 
REAL L,S; INTEGER N; 
FILE OUD C (1.15)¢ 
FORMAT OUT I (X4,74,X8,F7-1,X12,F9.1),J (x6, "N", X12, "1", x19, "S"); 
LIST © (N,L,S)3 


WRITE (C[DBL]J); 
FOR 50 STEP 25 UNTIL 300 DO 
BEGIN 
Te17+(N-1)x7; 
Sed /2x (L7+L) 
WRITE (C,I,0) 
END 


ho 


Example 3. Assume the results are printed with the following format: 


COL. 


fe) 
Q 


SE 


5 wb 5b BD HS 30 5 © 5 DH 5H © EG PP 
0.1740, +04 0.1176, +02 0.3748, +01 
BEGIN 


REAL A, RS, RT; INTEGER W, L, H; 
FILE OUT J (1,15); 
FORMAT OUT M (3[X5,E11.4]); 


Wel2; LeOl7; Hel; Ae (WxL+WxH+LxH) ; 
RS-SQRT (A/ (4x3 .14159265359) ); 
RT+A/ (4xRSx3 .14159265359*2) ; 
WRITE (J,M, A, RS, RT) 

END 


Example 4. Assume the input to be from cards in the following form: 


The first card contains the value of N in columns 1-4. Subsequent cards contain the 
values of the N elements of array X. They are punched as decimal numbers with two 
places after the decimal point. Every ten columns contain one value and the last 
ten columns are used for a sorting sequence number. Therefore each subsequent 


card contains seven values. 


Assume the two possible outputs of the program to be printed in the following 


formats: 


43 


Th 


If J=1 


COL. 1. 5 0 6&6 D @> yp ** HY Fb H F O© & fH FP H GS DW 
§ 
2 COMPUTATION OF MEAN VALUE, STANDARD DEVIATION, AND GREATEST DEVIATION 
re) 
he 
4 5 +nnnnnn.nn +nnnnnn.nn +nonnnn.nn nnonn 
re) 
? {9 
oe 
7+ {8 NO VALUES OF X[I] ARE EQUAL TO A 
re) 
(@) 
8 
Fat 9 SEQUENCE NUMBERS OF TERMS EQUAL TO THE MEAN VALUE 
oe) 
6 
5 nnonn nnonn nnnn nnnn nnn nnnn nnonn nonn 
re) 


t ; ; 
Assume skip to line 7 is controlled by a punch in channel 3 of printer's carriage control tape. 


Na 


The program will then be: 


BEGIN 

REAL A, SUM, SUMSQ, STANDEV, MAXDEV, Z; 

INTEGER N,1I,J, INDEX; 

INTEGER ARRAY Y [1:1000]; 

REAL ARRAY X [1:1000]; 

FILE IN Fl (2,10); 

FILE OUT F2 (2,15); 

FORMAT IN FORM. (T4),FORM2 (7[F10.2]); 

FORMAT OUT FORM3 (B24, "COMPUTATION OF MEAN VALUE, STANDARD DEVIATION, AND 
GREATEST DEVIATION"),FORM4 (X31, 3[X8,F10.2], x3,1I5), 
FORMS (X43,"NO VALUES OF X[I] ARE EQUAL TO A") 
FORM6 (X35, "SEQUENCE NUMBERS OF TERMS EQUAL TO THE MEAN VALUE"), 
FORM] (X8,15[X2,15], X7); 

LIST L2(A, STANDEV, MAXDEV, INDEX); 


READ (FL, FORML,N); 


BEGIN 
INTEGER P; 
LIST L3(FOR Pel STEP 1 UNTIL N DO x[P]); 


READ (F1,FORM2, L3) 
END; 


SUMO ; 
FOR Iel STEP 1 UNTIL N DO SUM+SUM+X[TI]; 
AeSUM/N; SUMSQ<O; 
FOR Tel STEP 1 UNTIL N DO SUMSQ-SUMSQ+X[ I]*2; 
STANDEV+-SQRT (SUMSQ/N-A*2) ; 
MAXDEV+-ABS (X[1]-A); INDEXe1; 
FOR Ie STEP 1 UNTIL N DO 
BEGIN ZeABS(X[I]-A); IF Z >MAXDEV THEN 
BEGIN MAXDEV-Z; INDEX-I END 
END; 


45 


WRITE (F2[ DBL]FORM3); 
WRITE (F2[3]FORM4, L2); 
JL; 
FOR Iel STEP 1 UNTIL N DO IF X[I]=A THEN 
BEGIN Y[J}+I; J«J+1 END; 
IF J=1 THEN WRITE (F2,FORM5) ELSE 
BEGIN 
INTEGER Q; 
LIST Ly (FOR Q@elL STEP 1 UNTIL J-1 DO Y [Q]); 


WRITE (F2[ DBL]FORM6) ; 
WRITE (F2, FORM7, Ll) 
END 
END 
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APPENDIX C 
MINIMUM BUFFER SIZES 
Whenever buffers are established in memory by means of a file declaration, it is 


necessary to indicate their sizes. The following table is presented for reference 


purposes, and indicates the minimum buffer size required for each type of I-0O 


equipment. 


INPUT 


(Buffer Size) 


Magnetic ————__$_ 1-1023 Dependent upon number of words = _—_—— record 


ale eccrine 


10 


FILE 


LT 


